home *** CD-ROM | disk | FTP | other *** search
/ Sounds Terrific 1 / Sounds Terrific CD (1994)(Weird Science)(Disc 2 of 2)[!][Amiga-PC].iso / modules / p / piano13.mod < prev    next >
Text File  |  1994-08-04  |  2KB  |  74 lines

  1. PIANO13.MOD - List current sub above read prompt (v4.20e)
  2. Piano Man #38 @6870
  3. Fri Dec 20 15:39:46 1991
  4. 5****************************************************************************
  5.     6                 PIANO13.MOD
  6. 2Written For:7 WWIV v4.20e
  7. 2Written By:7 Piano Man 1@6851 (1Ice7NET) 12@6850 (WWIVnet)
  8. 2Date: 7December 20th, 1991  2 While:7  Listening to RUSH (Freewill) :)
  9. 2Difficulty:7  Simple..
  10. 2Description: 7Prints the current sub that a user is on above the read
  11. prompt.  6EXAMPLE:
  12. 1General Forum
  13. 7Read:(1-30),?");
  14.  
  15. It's a useful mod and it looks pretty cool!
  16. Well,  this is my 14'th mod (2 PIANO10's -A&B) so please E-Mail me or call
  17. my board,  the add is at the end of the file..  THANKS!
  18. 5****************************************************************************
  19.  
  20. Legend:
  21. * = Search for
  22. = = Current Code (Existing...)
  23. - = Delete line
  24. + = Add line
  25. % = Moddify line
  26.  
  27.  
  28. On with the mod!
  29.  
  30. Step 1 -> Load up MSGBASE1.C
  31.  
  32. Step 2 -> Search for "void scan"
  33.  
  34. Step 3 -> Change the 'char' statements to look like this:
  35.  
  36. =  void scan(int msgnum, int optype, int *nextsub)
  37. =  {
  38. %    char s[81],s1[81],s2[81],s3[81],*b,*ss1;  <- Add the "s3[81]"
  39. =    int i,i1,i2,done,quit,abort,next,val,realexpress;
  40. =    slrec ss;
  41. =    long l,len;
  42. =    postrec p,p1;
  43.  
  44. Step 4 -> Search for "Read Prompt"  and make following changes:
  45.  
  46. =  case 0: /* Read Prompt */
  47. +    strcpy(s3,subboards[usub[cursub].subnum].name);
  48. +    prt(1,s3);
  49. %    sprintf(s,"3Read:5(1-%u,^%u),6 <ENTER>3 for next msg? :",nummsgs,msgnum);
  50. =    nl();
  51. =    if (express) {
  52. =      s[0]=0;
  53.  
  54. Step 5 ->  Save it,  go to dos and type in MAKE and compile it.
  55.  
  56. This mod was written assuming you are running WWIV v4.20revision 'E' and are
  57. compiling with Borland C++ v2.0.  So if it doesn't work,  go tell someone
  58. else...
  59.  
  60. Thanks and I hope you like this mod!
  61. Email me at 1@6851 (IceNET) and/or 12@6850 (WWIVnet)
  62.  
  63. Or call:
  64.  
  65. 3Milliways ]I[
  66. The Spirit of Radio
  67. WWIV v4.2e++ PIANOLIZED!
  68. (618) 259-7707
  69. 12/2400bps
  70. IceNET @6851 (ZC/AC)
  71. SysOp: Piano Man
  72.  
  73.  
  74.